home *** CD-ROM | disk | FTP | other *** search
/ CD Concept 6 / CD Concept 06.iso / mac / UTILITAIRE / Survival 6.0.2 / Macros / Select.Macro < prev    next >
Encoding:
Text File  |  1994-07-10  |  201 b   |  14 lines  |  [TEXT/MJUA]
  1. macro 'select';
  2.  
  3. var
  4. edad,status,grado,stage:integer
  5.  
  6. begin
  7. edad:= 3;
  8. status:= 1;
  9. grado:= 4;
  10. stage:= 5;
  11. GETDATA('HD80:Mrp Project:Data:Ejemplo.surv');
  12. SELECTIF((rData[4] = 4) and (rData[6] = 1));
  13. end;
  14.